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1. Inleiding 


In dit bulletin wordt ingegaan op die facetten van het 
CYBER-bedrijfssysteem die van belang zijn voor het ver- 
werken van ALGOL-programmatuur. Voor onderwerpen die 
niet uitsluitend op ALGOL’ betrekking hebben, wordt, hoe- 
wel niet steeds expliciet, verwezen naar de andere 
bulletins. Met name is het van belang het bulletin 

JOB CONTROL LANGUAGE te bestuderen. 


Bij de samenstelling van dit bulletin is uitgegaan van 
de situatie die geldt onder ALGOL version 3 (het huidige 
ALGOL-systeem). In de loop van dit voorjaar zal dit sys- 
teem vervangen worden door ALGOL version h. Belangrijke 
uitbreidingen en wijzigingen zullen zo spoedig mogelijk 
in dit bulletin verwerkt worden. | 


In gevallen waar het bulletin niet volledig is, of waar 
diepgaander informatie nodig kan zijn, wordt men steeds 
verwezen naar het betreffende manual: ALGOL Reference 
Manual Version 3 Pub. no. 60329000. 

Expliciete verwijzingen naar het manual zullen de volgen- 
de gedaante hebben, bijv. ARM 7-13 verwijst naar blz. 13 
van hoofdstuk 7 van het ALGOL Reference Manual. 


Ke 
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2. De ALGOL CONTROL CARD 


Voor de verwerking van een ALGOL-job op de CYBER heeft 
men minimaal 3 stuurkaarten nodig, te weten de JOB 
CONTROL CARD, de ALGOL CONTROL CARD eén de LGO-CARD. Men 
zie hiervoor het betreffende bulletin. De uitvoering 

van de ALGOL CONTROL CARD, die nodig is om het programma 
te compileren, zal hier wat uitgebreider behandeld 
worden. In de meeste: gevallen is voor executie de kaart 
LGO. toereikend. 


In de eenvoudigste gedaante ziet de ALGOL CONTROL CARD er 
als volgt uit: 
ALGOL. en 


Men kan echter parameters meegeven op deze kaart, waar- 
door men extra faciliteiten van het systeem ter beschik= 
king krijgt. De faciliteiten die men verkrijgt door ge- 
bruik van de opties F‚ L en X hoeft men niet speciaal 
aan te vragen, zij behoren standaard tot het bedrijfs- 


systeem. Men kan ze desgewenst wel uitschakelen. 


Een ALGOL CONTROL CARD met parameters heeft de volgende 
vorm: 

ALGOL ,par1,par2,par3,.....;,parn. 
Daarbij zijn par1l etc. ofwel afzonderlijk gerserveerde 
letters, de betekenis van de gereserveerde letters wordt 
toegelicht, ofwel een letter gevolgd door =0. De laatste 
vorm heeft tot doel dat de door de betreffende letter 


aangegeven optie wordt onderdrukt. 


De belangrijkste toegestane letters en hun betekenis zijn: 


L ‚ heeft tot gevolg dat de programmatekst wordt afge- 
drukt, tezamen met (fout-) meldingen. L is standaard 
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aanwezig. Onderdrukking, door L=0, geeft alleen de 
(fout-) meldingen. 

X ‚ brengt het programma in geschikte vorm voor 
executie. X is standaard aanwezig. 

FP ‚ zorgt er voor dat o.a. arraygrenzen en formele 
parameters gechecked worden. F is standaard aan- 
wezig. F is niet uit te schakelen door F=0, wel 
door gebruik van de Q-optie. 

Q ‚ array-grenzen en formele parameters worden niet 
gechecked, en er wordt geoptimaliseerde machine- 
code voor for-statements en array-adressering ge- 
genereerd. Bij gebruik van Q wordt de (standaard) 
aanwezige F automatisch onderdrukt. 

‚ array-grenzen worden niet gechecked. 

0 ‚ de gegenereerde machinecode wordt geoptimaliseerd. 
‚ levert gedetailleerde informatie over het program- 
ma, zoals blokstructuur, relatieve adressen en typen 


van gebruikte variabelen. 


Een volledige lijst van opties kan men vinden in ARM 6- 
1 t/m k. De volgorde van de opgegeven parameters op de 
ALGOL CONTROL CARD doet verder niet ter zake. 


Voorbeelden van ALGOL CONTROL CARDS zijn: 


1) ALGOL. 

2) ALGOL,F,‚L,‚X. (In de huidige constellatie zelfde 
effect als 1) 

3) ALGOL,F,L=0,X. (geen programmatekst) 

4) ALGOL,M. (voor programma's in testfase, uitge- 
breide informatie) 

5) ALGOL,L=0,0. (alleen voor goed uitgeteste programma's) 

6) ALGOL,O. (idem) 
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Opmerkingen 

1. Gebruik van de N-optie vermindert de executietijd, 
voor programma's met veel arraygebruik, aanzienlijk. 

2. De Q-optie vermindert de executietijd in het algemeen 
het meest. ‚ | 

3. De O-optie heeft tot gevolg dat de compiletijd langer 
wordt, de executietijd echter minder. De O-optie wordt 
alleen aangeraden voor gebruik van produktieprogram- 


ma's. 
. 


Het is niet aan te raden, andere dan de F, L, X, en M- 


opties in de testfase te gebruiken. 
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3. Afwijkingen t.o.v. 
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In deze paragraaf worden de 


belangrijkste afwijkingen 


t.o.v. het-Reviseds Report genoemd en waar nodig van 


voorbeelden voorzien. Uitvoeriger informatie vindt men 


in ARM 2. 


a. Slechts 1 type letter is 
symbolen worden op kaart 
(in 029-code). 


begin p 


end 


De diverse ALGOL- 


als volgt gerepresenteerd 


toegestaan. 


"BEGIN" 
n END'' 


i.h.a. wordt ieder onderstreept symbool vervangen door 


de tekst in hoofdletters 


A 


Ve tn [A 


LJ 


stringquotes: 'tekst'!' 


10 


omgeven door dubbelaccenten. 


WLESS" of < 
HNOT GREATER" 
"EQUAL" of 
NOT EQUAL" of 
"GREATER" of > 
WNOT LESS" of 
“e of "POWER" 
WAND" 

LOR" 

NOT" 

U of 1 

1 -sf 1 

"Ct TEKST ")" 


of <= 


A= 


>= 


PDIV" of "/" of // 
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b. De controle op overschrijding van arraygrenzen is niet 
waterdicht. Bij gebruik van arrayelementen wordt 
slechts gechecked:of het betrokken element in het voor 
dat array gereserveerde deel van het geheugen gesitu- 
eerd kan worden. . 

Bijv. Na declaratie vän array Al1:4,1:5] volgt op 

gebruik van Al -1,12] geen foutsituatie. Namelijk, als 

Al 1,1] opgeborgen wordt op adres AA dan worden de 

overige elementen Al i,jl opgeslagen op de adressen 

j-1+(i-1)#5+AA. 

Volgens deze formule wordt Al-1,12] geidentificeerd 

met de inhoud van adres AA+1 en komt dus overeen met 

AL 1,21. 

Opm. Bij 1-dimensionale array's komt deze "globale 
controle!" overeen met een volledige arraygrens=- 


controle. 


c. Integer labels zijn niet toegestaan. Een programma 


mag niet worden voorafgegaan door een label. 


d. Het getalbereik voor reals x is 
3.110-29h<abs(x)<1.310322 inclusief x=0. 
De mantisse van x wordt gerepresenteerd door 48 bitss 
hetgeen betekent dat x tot op 14 (soms 15) decimalen 
exakt gerepresenteerd wordt. 
Voor integers i is het bereik: 
lijs2*®-1 > 2.817018 


Overschrijding van het getalbereik leidt veelal tot 
(fatale) complicaties, maar overschrijding van de 


integercapaciteit leidt niet tot foutmeldingen. 


e. In een for-statement geeft gebruik van een subscripted 


variabele als controlled variabele. moeilijkheden. De 
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statement 

i:=1; for al il:=0.3,0.4,0.5 do i:zit1; 
heeft tot gevolg dat al 1} achtereenvolgens de waarden 
0.3, O.k en 0.5 krijgt. 


Alle formele parameters in een procedureheading moeten 
gespecificeerd worden, en het aantal formele parameters 


mag hoogstens 63 bedragen. Correspondentie tussen 





formele en actuele parameters wordt standaard gechecked 
en het type van de formele parameter is steeds door- 


slaggevend. 


Een goto-opdracht naar een undefined switchdesignator 
is volgens het Revised Report aequivalent met een 
dummy statement, op de CDC leidt het tot een fout- 
situatie. 


Dynamische own array's zijn niet toegestaan. 
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4. INPUT en OUTPUT 


We zullen enkele van de meest praktische in- en uitvoer- 
procedures geven. Voorts zal aangegeven worden hoe men 


zelf wat meer structuur kan brengen in de gedaante van 





uitgevoerde getallen via de regeldrukker. Bij deze pro- 


zB ee 23E 


cedures moet men steeds als eerste parameter een nummer 
meegeven, het z.g. channelnummer, om aan te geven waar- 
van men data wenst te betrekken of waar men data uitge= 
voerd wenst te hebben. 

Voor normale input en output is het van belang te weten, 
dat er twee channelnummers door het bedrijfssysteem ge- 


reserveerd zijn. Men heeft die standaard ter beschikking. 


De gereserveerde channels zijn: . 

a. nr. 60. De van channel 60 betrokken data worden via 
de kaartlezer gelezen. 

b. nr. 61. De naar channel 61 weggeschreven data worden 


naar de regeldrukker gestuurd en aldaar afgedrukt. 


We zullen in dit hoofdstuk steeds aannemen dat men data 
van kaarten wenst te lezen of via de regeldrukker afge= 


drukt wenst te zien. 


U.1 INREAL(60,X) % 
Het eerstvolgende getal wordt van kaarten gelezen 


en toegekend aan X. X moet van het type real zijn. 


H.2 OUTREAL(61 ,X) 
De waarde van de arithmetische expressie X wordt in 
standaardformat afgedrukt door de regeldrukker (xie 
standaardformat). 


1.3 _INARRAY(60,A) 
Het hele array A wordt gevuld met getallen die achter- 


cenvolgens van kaarten gelezen worden. 
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4.4 OUTARRAY(61,A) 
Het hele array A wordt in standaardformat afgedrukt 


door de regeldrukker. 


Opm. eendimensionale array's worden gelezen resp. 
afgedrukt in volgorde van stijgende indexwaarde, 

meerdimensionale array's in lexicograf ische volg- 
orde, hetgeen bijvoorbeeld betekent dat tweedimen- 
sionale array's rijgewijs gelezen resp. afgedrukt 


worden. 


u.5 Overgang op: nieuwe regel 
OUTPUT (61 ,"(1/")"") 


De regeldrukker stelt zich in op het begin van de 
volgende regel. Men mag de deelstreep vooraf laten 
gaan door een positief geheel getal, bijvoorbeeld 
OUTPUT(61,"("3/"")"") netgeen betekent dat 3x achter- 
een op een nieuwe regel wordt overgegaan. 


« 


4.6 Overgang op nieuwe pagina 
OUTPUT CBI (Met jet j 


4,7 Afdrukken van teksten 
OETPUP LSI „CECT PEN) 
TEKST wordt afgedrukt door de regeldrukker. 


4.8 Spatie 
OUTPUT (61 ,"(*B'")") 
De printpositie op de regeldrukker schuift 1 positie 
naar reehts. Door voorvoeging van een geheel positief 
getal bereikt men dat dit meerdere keren achtereen 
gebeurt, bijv. OUTPUT(61,"("17B")") heeft tot ger 
volg dat de printpositie 17 posities naar rechts 


opschuift. 
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Meer structuur in de printuitvoer 





Men kan zelf meer structuur aanbrengen in de af te 
drukken getallen, bijv. wijziging van het aantal 
decimalen voor of na de decimaal punten, onderdrukking 
van het teken etc. 

Dat kan men doen met uitvoerstatements van de volgen= 


de gedaante: 
OUTPUT(61 ,"("format1,format2,...sformatn!"")"',‚x1s...,Xm) 


Dit vereist eerst enige globale toelichting. Een 
format geeft hetzij informatie over de gedaante waar=- 
in wij een getal afgedrukt wensen te zien, hetzij 
aanleiding tot tekstuele acties via de printer. Bij 
het laatste denken we aan spaties, teksten, overgang 
op nieuwe regel etc. Ook kunnen formats voorkomen 

die zowel de gedaante van een getal als tekstuele 
informatie weergeven. Deze formats zullen we gemaks=- 
halve ook als getalvorm beschrijvend beschouwen. 

Bij de boven weergegeven statement worden de formats 
uitgevoerd van links naar rechts met als evêntuele 
operanden een arithmetische expressie uit de lijst 

x1 t/m xm. 

Daarmee bedoelen we het volgende. Als een format: 
louter ‘tekstuele informatie verschaft, dan staat het 
op zichzelf en bekommert zich verder niet om de lijst 
x1 t/m xm. 

Als echter een format getalvormbeschrijvend is, dan. 
wordt er vanuit gegaan dat het de gedaante van de 
waarde van de eerstvolgend aan de beurt zijnde 
arithmetische expressie beschrijft. Het aantal getale 
beschrijvende formats moet overeenkomen met de Lengte 
van de lijst x1,...;Xxm. 


Indien alle formats uitsluitend ‘tekstuele informatie 
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verschaffen, dan is de lijst leeg. Voorbeelden hier- 
van zijn we reeds tegengekomen (zie 4.5): 
OUTPUT (61 ,"(*/")"). het format is hier / . Ook (4.6) 


t/m (4.8) geven voorbeelden van dergelijke formats. 


Het samenstellen van: formats is aan zekere regels ge- 
bonden. We: geven eerst een lijstje van de belang- 
rijkste componenten waaruit een format wordt opge- 
bouwd, daarna zullen we de belangrijkste regels 
voorbeeldgewijs toelichten. 

De hier beschouwde componenten zijn de hoofdletters: 
B HL FN 

en de symbolen: 

A SE se A 


Standaardformat 

Het eenvoudigste getalvormbeschrijvende format is N, 
hetgeen betekent dat de daarmee corresponderende 
arithmetische expressie op standaardwijze wordt weg- 
geschreven, d.w.z. teken, 1 decimaal voor de punt, 
13 decimalen na de punt, laag tientje met exponent 
bestaande uit teken met 3 decimalen. ‚ 
Voorbeeld OUTPUT(61,"(*N,/‚N")";x1,x2) heeft twee 
getalformats en 1 tekstuele format, Deze statement is 
identiek aan uitwerking met de volgende drie samen. 
OUTRBAL(61siids OUTFOTCSL, "LPAR ES OUTREALCEI ad ) 5 
(zie H.2 en H.5). 


nn ee nn 


Met de letter D kan men aangeven welke decimalen van 
een getal men wenst te zien. Wenst men bijvoorbeeld 
een getal afgedrukt te zien met n decimalen voor de 
decimaalpunt, m decimalen na de deeimaalpunt en k 


decimalen in de exponent, dan ziet het format dat 
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deze gedaante beschrijft, er als volgt ut $ 


" 
+DD,..D.DD...D'+D...D met ket 


nx IX kx O<ntm<2h 
Hierin staat D voor af te printen decimaal 
+ geeft: aan dat het teken wordt afgedrukt 
geeft de positie van de decimaalpunt aan 
„en " is de representatie van het ALGOL-sym- 


bool 10- 


Voorbeeld 1: 
OUTPUT (61 ,"("'+DDD.DD"+DD")"",-13.7) 

heeft tot gevolg dat via de printer wordt afgedrukt: 
-137.0010-01 


Opmerkingen 


1. In gevallen waar dat nodig is wordt een getal 
correct afgerond, f 
bijv. OUTPUTEBL,"(C*rD. DREDD" j,- 13,7) 
heeft het printen van -1.410+01 tot gevolg. 
2. Als een aantal D's direkt na elkaar in een format 
voorkomen, mag men ze vervangen door één D met 
het aantal ervoor. Dat aantal moet een tekenlocs 
geheel getal zijn 
bijve Tspevs +DDD. DD"+DD mag men schrijven 
4+3D.2D"+2D 
3. In een format mag men het gedeelte haDaseD weg 
° kx 
laten, d.w.z. men wenst in de uitvoer geen 
exponentieel gedeelte. 
bijv. OUTPUT(61,"("+DDD.DD")",-13.7) heeft het 
printen van „013.70 tot gevolg. 
bh, Men mag de decimaalpunt met alles wat daarna 


hd 


voorkomt weglaten 
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bijv. OUTPUT(61,"("+DDD"}",-13.7) levert af 

-014 | 

Men mag ook alleen het gedeelte na de decimaal- 
punt, maar zonder het exponentieel gedeelte, weg- 
laten, 

bijv. OUTPUT(61,"("+DDD"+DD")",-13.7) levert af 
1871 o=0d 

5. Er wordt steeds getracht, voor zover het format 

dat toelaat,de meest significante decimaal on- 
„gelijk nul zoveel mogelijk naar links te plaatsen; 
als dat niet mogelijk is, dan worden de betreffen- 
de plaatsen met nullen aangevuld. Zie het voor- 
beeld bij opm. 4. 

6. Als een getal niet volgens het aangegeven format 
te beschrijven is, dan wordt het uitgevoerd 
volgens standaardformat (N) en omgeven door ster- 
retjes: “4D.13D10+3D* 

7. Men kan op iedere plaats het positieve teken 
onderdrukken door het symbool + weg te laten. 

Als men het eerste + teken weglaat, dan wordt de 
waarde zonder teken afgedrukt. Als het betreffen- 
de teken negatief is, ontstaat een foutsituatie. 
Voorbeeld 1. OUTPUT(61,"("DD.DD")",+13.7) 
levert 13.70 
2. OUTPUT(64,"(*DDD"DD")",-13.7) 
heeft een foutsituatie tot gevolg. 

8. Als men het + teken vervangt door het - teken, 
dan:heeft dat tot gevolg dat het teken bij het 
printen onderdrukt wordt als het teken positief 
is (men krijgt dan een spatie) en dat. het teken 
afgeprint wordt als het negatief is. 

Voorbeeld: OUTPUT(61,"("-D.DD"-DD")",-13.7) 
levert.via de printer =1.371001 
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Door gebruik van de letters B en Z kan men de getal- 
uitvoer verder verfraaien. Overal waar men in het 
format een of meerdere B's tussenvoegt, krijgt men 
op de overeenkomstige plaatsen in de printuitvoer 
een of meerder spaties tussengevoegd. 
Voorbeeld: OUTPUT (61 ,"("+BDBD. DBD"+DBD")",-13.7) 
levert via de printer — 1 3.7 Oyo+0 Q 
Het gebruik van spaties kan handig zijn bij de uit- 
voer van grote getallen: 
OUTPUT(61,"("DB3D")",+1024.2) 
levert 1 024 af. 
Ook andere tekstuele symbolen kan men "mengen!" in 
het format. 


Als men bij het printen van een getal niet-signifi- 
cante nullen wenst te onderdrukken, dan kan men 
daarvoor de hoofdletter Z gebruiken i.p.v. D 
Voorbeeld: OUTPUT(61,"("+32.2D"+22"")"",-13.7) 
levert 137.0010-1 af. 
Vergelijk dit met Voorbeeld 1. 
Als bij gebruik van Z in het exponentiële gedeelte 
de exponent nul is, dan wordt het exponentiële ge- 


deelte helemaal weggelaten. 


Opmerkingen 


1. De letter Z mag niet An het gedeelte na de deaie= 
maalpunt (maar voor het exponentiële gedcelte) 
voorkomen. 

2. De letter Z mag nooit na een D voorkomen. 

3. Het gebruik van uitsluitend Z's i.p.v. D's is 
niet verstandig, aangezien 
OUTPUT(61,"("+22"")'",0) slechts 3 spaties op de 
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regeldrukker aflevert. Het is om die reden aan 
te raden de decimaalpunt te laten voorafgaan 


door minstens een D. 


nn nn nn nnn nn nn en en ee 


Bij normaal gebruik van D en Z worden getallen 
zodanig afgerond dat ze in het bijbehorende format 
passen. Indien men echter geen afronden maar afbreken 
wenst dan kan men dat aangeven door gebruik van de 
letter T. 
Voorbeeld: OUTPUT(61,"("4+D.DD")",1.237) 

levert + 1.24 

OUTPUT (61 ,"(""+D.DDT")",1.237) 

levert + 1.23 


4.10 De verwerking van alfanumerieke gegevens 


Door gebruik van een speciaal format is het ook 

mogelijk om symbolen te lezen van kaarten. Het daar- 

voor benodigde format bestaat uit A's. 

Voorbeeld: _INPUT(60,"("A")",X) 
geeft aan de integer X de interne waarde 
die de machine toekent aan het eerst- 
volgend gelezen symbool van kaarten. 

Men mag meerdere A's tegelijk gebruiken. 

Voorbeeld: INPUT(60,"("AAAAAM)' ‚X) 
zorgt ervoor dat een string van 5 
symbolen gelezen wordt. De interne 
representatiewaarde van de gehele string 


wordt toegekend aan X. 


Opm.: Het maximale aantal A's dat binnen een formal 
gebruikt mag worden is 8, omdat maximaal 8 
characters in een machinewoord opgeborgen 


kunnen worden. 
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Als men wenst te weten welke de interne representatie- 
waarde van een string van maximaal 8 symbolen is, dan 
kan men daar achter komen door gebruik van de proce= 
dure EQUIV. 

Voorbeeld: X:=EQUIV("("ALPHA")") heeft tot gevolg 
dat X de’ interne representatiewaarde van 
de string ALPHA krijgt. (X heeft dan 
dezelfde waarde als wanneer men met 
INPUT (60 ,"("AAAAA")"!,X) de string ALPHA 
zou inlezen). 

Men kan de waarde van enkele symbolen tenslotte als 

het ware zelf definiëren door gebruik van de proce- 

dures: INCHARACTER en OUTCHARACTER. 


INCHARACTER(60 ,"(*S 19253" é Sy 2D heeft tot ge- 


volg dat er een symbool S van kaarten wordt gelezen. 
Als S niet voorkomt in de rij verschillende symbolen 
548 0 


he N° 
aan 5, dan krijgt I de waarde p. 


dan krijgt I de waarde 0. Als S gelijk is 


OUTCHARACTER(61,"(YS,S,...+S, 1D", ID heeft tot gevolg 
dat het symbool, met rangnummer gelijk aan de waarde 
van I, wordt afgedrukt. De waarde van I moet liggen 
tussen 1 en N. Als I negatief is dan heeft de proce- 
dure geen aktie tot gevolg. Als I=0 of I>N, dan - 


treedt een foutsituatie op. 


Hal Prepareren van input 


Bij het inlezen via INREAL of INARRAY of met INPUT 
via standaard format N geldt dat 2 spaties als ge= 
talscheider dienen. De getallen zelf mogen iedere 


gedaante hebben die volgens ALGOL is toegestaan. 


N.B. Gebruik van teken alleen als getalscheider is 


niet voldoende. 
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4.12 In- en uitvoerstatements voor cursusdoeleinden 
In aansluiting op de in- en uitvoerstatements uit 
de cursus ALGOL 60, van de hand van Van der Sluis 
en Görts, zijn een aantal zeer eenvoudige in- en 


uitvoerstatements ontworpen. De voornaamste zijn: 


1. READ 
de statement X:=READ heeft tot gevolg dat het 
eerstvolgende getal van kaarten wordt gelezen 
en aan X wordt toegekend. 

2. PRINT(A) — 
de waarde van de arithmetische expressie A wordt 
op de printer afgedrukt. 

3. PRINT("("RIJ SYMBOLEN")"') 

RIJ SYMBOLEN wordt afgedrukt op de printer. 

4. LINE(1) 

de printer gaat over op een nieuwe regel. 


Men kan van deze statements gebruik maken, door 
voor de ALGOL CONTROL CARD twee kaarten toe te 
voegen, namelijk: 
ATTACH,SYSOVLX,X8CDC ,ID=UACCU,CY=b ‚MR=1. 
LIBRARY ,SYSOVLX. 
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5. CHANNELS 


In het algemeen betrekt men data van file's en schrijft 
men data naar file's weg. Men kan binnen een ALGOL- 
programma deze file's aanvragen door het definiëren van 
zogenaamde channels. Ieder channel correspondeert met 
een file. 

Een channel wordt gedefinieerd door een channelnummer 
en een naam. De bij een channel behorende file is ge- 
durende de hele job onder die naam bekend. Normaliter 
worden files door het systeem verzorgd op schijvenge- 


heugens. 


Het definiëren van channels geschiedt via zogenaamde 
CHANNEL-kaarten. Zulk een CHANNEL-kaart ziet er als volgt 
HAES 


CHANNEL, en=file name,lijst van parameters. 


de acht karakters CHANNEL, moeten steeds in kolom 1-8 

van een kaart staan. 

en = het zelf te kiezen channelnummer (maximaal 14 deci- 
malen), uitgezonderd de nrs. 60 en 61; 

file name = de zelf te kiezen file-naam 


het gedeelte ‚parameters mag ontbreken. 


Re. 


De volgende CHANNEL's worden standaard door het systeem 
gedefinieerd. 
a) CHANNEL nr. 60 onder de naam INPUT. 

Dit channel wordt gebruikt voor het lezen van kaarten. 
b) CHANNEL nr. 61 onder de naam OUTPUT. 

Dit channel wordt gebruikt voor het afdrukken via de 


regeldrukker. 
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Als men zelfgedefinieerde channels uitsluitend bespeelt 
via INARRAY, OUTARRAY, INREAL en OUTREAL dan kan de 

lijst van parameters worden weggelaten. 

Als men getallen wegschrijft naar een channel, dan staat 
na afloop de lees/schrijfpositie gesteld na het laatst 
weggeschreven getal. Hetzelfde geldt voor het uitlezen 
van een channel. 

Als men weggeschreven getallen van een channel wil terug- 
halen, dan zal men dus eerst de lees/schrijf- 

positie aan het begin van de channel moeten instellen. 
Dit kan men doen met aanroep van de procedure REWIND. Zie 
hoofdstuk 7. 


N.B. Deze REWIND is niet dezelfde als die welke men op 
stuurkaarten kan meegeven. 


De channelkaarten komen direct na de programmakaarten en 
worden van deze gescheiden door een EOR-kaart (7/8/9- 
ponsing). Eventuele data worden gescheiden door een 
kaart met als tekst: 

CHANNEL , END 
Direkt na deze kaart kan men eventuele datakaarten geven. 
Ontbreken deze data, dan kan men de CHANNEL,END-kaart 
weglaten. De channeldefinities houden op bij de EOF-kaart 
(6/7/8/9-ponsing). - i 


Men kan channels gebruiken om array's getallen binair op 
te slaan. In dat geval dient men op de definierende 
channelkaart de parameter A toe te voegen. Lezen en 
schrijven van resp. naar zo'n channel is dan slechts 
mogelijk via'de procedures GETARRAY resp. PUTARRAY. 


PUTARRAY(en,‚B) schrijft het gehele array B binair 


weg naar het channel met channelnr. cn en plaatst er een 
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EOR-mark achter. In dit geval wordt het hele array B als 


één record beschouwd. 


GETARRAY(en,B) leest het hele array B binair in van 

het channel met channelnummer en. De lengte van het te 
vullen array B moet overeenkomen met de lengte van het 
record dat eerder na en is weggeschreven. Indien het in 
te lezen array te groot is t.o.v. de lengte volgt geen 
foutmelding, maar heeft het te veel gelezene niet ge- 
definieerde waarden. Als de lengte van het array te 
klein is t.o.v. de recordlengte dan geeft dat geen pro- 
blemen. Na het lezen staat de schrijf/leespositie steeds 
aan het begin van het volgend record. 

Voor procedures om bij het lezen of schrijven records 
over te slaan, resp. terug te "spoelen" e.a. nuttige 
zaken, zie men het hoofdstuk systeemprocedures (speciaal 
REWIND en BACKSPACE). 


N.B. Indien men een record overschrijft,;zijn evt. verder 


gelegen records verloren voor verder gebruik. 
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6. (FOUT-)meldingen. 


Bij verwerking van een ALGOL-programma krijgt men na de 


evt. programmatekst een aantal boodschappen. Sommige van 

deze boodschappen zijn meldingen van het systeem, waaruit 

men nuttige informatie kan halen zoals: | 
regelnummer gevolgd door tekst PROGRAM BEGINS(MESSAGE) ; 

Deze melding geeft aan op welk regelnummer volgens de 

compiler het programma begint. 

Evenzo krijgt men een melding op welke regel het programma 

eindigt, en op welke regel het source-dek eindigt. 

Men kan hier uit zien of de begin-, end-telling klopt etc. 

Als na een melding vermeld staat het woord MESSAGE dan 

hoeft zo'n melding niet op een foutsituatie te duiden. 

De overige meldingen duiden in ieder geval wel op fout- 

situaties. Men krijgt steeds een regel tekst waaruit de 

aard van de fout, bij compilatie, blijkt, benevens het 

regelnummer waar de fout optrad. 

Voorts krijgt men een melding van de opties die men gebruikt. 

heeft, evt. standaard van het systeem ter beschikking heeft 


gekregen. 


Als een programma bij compilatie geen fouten meer bevat, 
krijgt men bij de executiefase weer allerlei meldingen. 
Allereerst krijgt men een melding, welke channelkaarten 
men heeft gebruikt, en welke het systeem standaard ver- 


zorgd heeft. 


Tijdens executie kunnen 3 soorten foutmeldingen optreden. 


1. INPUT/OUTPUT-foutmeldingen. Deze verschijnen in de day- 
file (aan het eind van de output). Een lijst van fout- 
meldingen vindt men in ARM 8-14. 


A 
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2. MODE-fouten. Deze verschijnen eveneens in de dayfile. 
Men zie hiervoor het bulletin over DUMPS. 

3. Overige fouten die optreden tijdens executie. Deze 
verschijnen voor de DUMP. Men krijgt een melding over 
de aard van de fout, de regel waar het optrad, benevens 
een volledig overzicht van het deel van de blokstruc- 
tuur van het programma dat voor de opsporing van de 


fout relevant is. 


Als een programma volledig afgewerkt wordt, (er treden 
geen foutmeldingen op), dan verschijnt na de uitvoer de 
tekst END OF ALGOLRUN #*V3,0% 
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1. Systeemprocedures 


7.1 CLOCK. 
De real procedure CLOCK geeft op ieder moment de tot 
dan toe door het betreffende programma gebruikte 
CPU-tijd in seconden. De waarde is nauwkeurig tot op 


milliseconden. 


7.2 REWIND(en). 

Sd Deze procedure heeft tot gevolg dat de lees/schrijf- 
positie van CHANNEL met nummer en op het beginpunt 
wordt ingestéld. Bij channels die nog niet gebruikt 
zijn, staat deze positie automatisch op het begin- 


punt. 


…4 


7.3 BACKSPACE(en). 
Op channel met channelnr. en wordt de schrijf/lees- 
positie één record teruggezet. Men-kan deze proce- 
dure effectief gebruiken in samenhang met PUTARRAY 
en GETARRAY (zie hoofdstuk 5). 


7.4 _BADDATA(en label). 

Als bij het lezen van channel met channelnummer en 
iets gelezen wordt dat niet in het opgegeven format 
past, dan wordt als “regel het programma met een fout- 
melding beëindigd. Als echter BADDATA in het program- 
ma wordt aangeroepen, dan zal het programma in zo'n 
geval bij het in de aanroep van BADDATA gespecifi- 
ceerde label verder gaan, mits dit label bereikbaar 


is vanuit het blok waar de formatfout optreedt. 


7.5 DURP (var) 
Bij gebruik van deze procedure worden de waarden van 


de locale variabelen binnen het blok waar DUMP wordt 
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aangeroepen, via de regeldrukker afgedrukt. 


Als begeleidende tekst krijgt men: 


THIS IS DUMP NUMBER <waarde van var> AT LINE 


<regelnummer?>, 


waarbij var een zelf. te kiezen gehele positieve 


waarde kleiner dan 8192 moet zijn. 


Voor overige systeemprocedures zie ARM 3-41 en verder. 
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